home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 November / macformat-018.iso / Comms Spectacular / MacTCP / MacPPP Control 1.1 / Examples / Close PPP next >
Encoding:
Text File  |  1994-03-07  |  315 b   |  11 lines  |  [TEXT/ToyS]
  1. --
  2. --    This example script uses the MacPPP Control addition to close the PPP
  3. --    link.  Running this script is identical to opening the MacPPP control
  4. --    panel and pressing the Hard Close button.
  5. --
  6.  
  7. if PPPopened then
  8.     closePPP
  9. else
  10.     display dialog "MacPPP is already closed" buttons {"OK"} default button "OK"
  11. end if